DDDDDDDDDDDD ccccccecccccce «LLL 
DODDDDDDDDDD cccccccccccc LLL 
cecccccccccce «LLL 


DODDDDDDDDDD 
DOD DDD ccc LLL 
DOD DDD ccc LLL 
DDD DDD CCC LLL 
DDD DdbD CCC LLL 
DOD DdDD CCC LLL 
DOD DDD ccc LLL 
DDD DDD ccc LLL 
DDD DdDD ccc LLL 
DDD DDD CCC LLL 
DOD DbD CCC LLL 
DOD DOD ccc LLL 
D DDD CCC LLL 
DOD DDD ccc LLL 
DOD DOD CCC LLL 
DOD bbdD CCC LLL 
DDDODDDDDDDD CCCCCCCCCCCC LLL LLLLLLLLLLL 
DODDDDDDDDDD CCCCCCCCCCCC LLL LLLLLLLLLLL 
DDDDDDDDDDDD CCCCCCCCCCCC LLLLLELLELLLLLLLL 
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DDDDDDDD 
DDDDDDDD 
dD DD 
DD DD 
dD DD 
DD DD 
dD DD 
DD DD 
dD DD 
DD DD 
dD 
0D DD 
DODDDDDD 
DDDDDDDD 
MM 
MM 
MMMM 
MMMM 


ASOOOAOOAOOOON 
OOOOOAOOOOM 


DDDDDDDD 
ena 


i) DD 
DDDDDDDD 
DDDDDDDD 


LL DDDDDDDD EEEEEEEEEE FFFFFFFFFF 

LL DDDDDDDD EEEEEEEEEE FFFFFFFFFF 

LL DD DOD EE FF 

LL DD DD EE FF 

LL DD DD EE FF 

LL DD DD EE FF 

LL DD DD EEEEEEEE FFFFFFFF 

LL DD DD EEEEEEEE FFFFFFFF 

LL DD DD EE FF 

LL DD DD EE FF 

LL DD DD EE FF eeee 
LL DD DD EE FF cove 
LLLLLLLLLL DDDDDDDD EEEEEEEEEE FF cove 
LLLLLLLLLL DDDDDDDD EEEEEEEEEE FF cece 
LL 

LL 

LL 

LL 

LL 

LL 

LL 

LL 

LL 

LL 

LL 

LL 

LLELLLLLLLL 


LLLLLLLLLL 
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DCL Command Language Interpreter internal structure definitions 


IDENT *V04-001" 


COPYRIGHT 4H 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS fo “serie ae FURNISHED UNDER A LICENSE AND MAY BE USED AND lh a 
ONLY IN ee ANCE WITH THE TERMS OF SUCH bie ENSE ~ Re THE 
INCLUSION O FoTHE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR OTHER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
vaenistchaten NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
a ookat itn NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


RECS ALAA AAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAARAAAAAAAEEEAAEAEAAEEREREREEREE 


+ 
FACILITY: DCL Command Language interpreter 
ABSTRACT: 


These are the structure definivions used by the DCL 
command interpreter. 


ENVIRONMENT : 


VAX/VMS operating sytem. supervisor mode. 


AUTHOR: Tim Halvorsen, Feb 1980 
Modified by: 


v04-001 HWS0106 rold Schultz ae 984 
Add PRC_W _ASTSTANIS. PRC_W_AS.TIOSB, and PRC_W_ASTRETN 
to store status data from the CNTL-Y AST routine. 


v03-025 HwWS0087 Haroid Schultz 20-Jul-1984 
Change order in DCL table so that FLAGS will not 
be on the end. Fixes problem were a BLBx is used 
to interrogate the flag and causes an accvio if the 
three bytes past FLAGS (FLAGS is last allocated byte) 


ARAB AAAAAALAASLALALALELELALA LEAL ALALE LEAR ASE SEES SERRE SESE EET E SERRE 


® 
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® 
® 
* 
*® 
® 
® 
® 
® 
® 
® 
* 
® 
® 
* 
® 
® 
® 
® 
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are not readable. (BLBx instructions use cengwers 
context, which when applied to FLAGS causes FLAGS + the 
next three bytes to be accessed). 

Add PRC_B_EXONLYL to store indirect level of first 
encountered exe-only procedure. Add PRC_V_SAVCMDV ond 
PRC_V_SAVIMGV to store saved command and Tmage verification 
modes. (Make PRC_V_EXEPROC obsolete) 


v03-024 HwS0045 Harold Schultz 30-Mar-1984 
Add TABLE flag to SPWN_W_FLAGS. 


S ap 
Add WRK_O_CLOSERR to WRK_W_FLAGS2 


v03-023 HwS0035 Harold Schultz 21-Mar-1984 
Add IRUNDWN flag to new flag byte IMGFLAG to track 
image rundown. 


v03-022 HWS0007 Harold Schultz 13-Feb-1984 
age Pca V.CARRCNTL for prompt string carriagecontrol 
n 
Add PRC_L_STS and PRC_L_STV 
Add SPWR_9_NOCTX 


v03-021 PCG0027 Peter Seorpe 06-F eb-1984 
Add CTX_V_CTRLY and CTX_V_CTRLT. 
v03-020 PCG0026 Peter George 11-Jan-1984 


Add PRC_L_IMGACTSTS. 


v03-019 PCG0025 Peter George 11-Jan-1984 
Add EDIT_V_LOWERCASE. 


v03-018 PCG0024 Peter George 03-Jan-1984 
Change PRC_V_REPROMPT to PRC_V_FLUSH. 


v03-017 PCG0023 Peter George 01-Dec-1983 
Add ERASE keypad flag. 


v03-016 PCG0022 Peter George 07-Sep-1983 
Add OUTFLAGS to OUT, PRC, and IDF. 


v03-015 PCG0021 Peter George 16-Aug-1983 
Add WAIT bit to CTX. 


Peter George 27-Jun-1983 


nd $ P 
SB and QRR_L_SIGNALRTN. 
_C_RECALLMAX? 

Peter George 01-Jun-1983 
TAB_VEC. Incr size of token buffer. 


xo 


v03-013 PCG0019 
Remove PRC_L 
Add SPWN_V_KEYPAD. 


v03-012 RASO157 Ron Schaefer 17-May-1983 
Add support for new logical names services to CTX. 
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v03-011 


v03-010 


v03-009 


v03-008 
v03-006 


v03-005 


v03-004 


v03-003 


v03-002 


v03-001 P 
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ecooeTe Peter georg’ 03-May-1983 
Add PRC_Q_FLUSHTIME and CTX_V _VERINARE, 
PCG0017 Peter George 20-Apr-1983 


Add prompt string and keypad state to CTX. 
Add prompt string and new flags to SPWN. 
Add Sutput mailbox info to PRC. 


PCG0016 Peter George 30-Mar-1983 
aes PRC_V een: 
d SPWA_T_P 
ened “uRKS Re CRSiauFSiz. 
Increase size of recall buffer. 


PCG0015 Peter George 29-Mar-1983 

Fix CTX_C_KEY* definitions. 

PCG0014 Peter George 17-Feb-1983 
Make too many changes to meaningfully List here. 
PCG0013 Peter George 28-Jan-1983 


Remove the ONEXIT bit from 
Add SPWN_V_NOTIFY and SPWN_V_ CONTINUE. 


PCG0012 Peter George 01-Dec-1982 
Uncomment part of 0 data structure. 
Excess ERRRAB and ERRIFI. 

Add SYSSOUTPUT PRC fields. 

Add OUT data structure. 
Add IDF_L_FILENAME. 


PCG0011 Peter George 16-Nov-1982 
Reorganize WRK bloc 
Remove WRK_C =DcLauF siz. WRK_G_DCLPRSBUF, WRK_G_RECORD. 
Increase size of command buffers 

Sat for in ue Santer - “ceed by LIBSDO_COMMAND. 
ag $17 field to T 


PCG0010 Peter george 25-0c t-1982 
Add PROMPT entities. Add DCL_V_NEXTQUAL flag. 
Peter George 21-Jun-1982 


PCG0009 coe 
Add PTR_V ane rvere. PTR_V y- NTAX, PTR_K_IGNORE, PTR_B_LEVEL, 
“an 
Add WRK fgcrORPTRTN WRK_V_CONTIN, WRK_B_VALLEV, and 


MODE . Dales te WRK_V_QUAL? 
Double size 4 a WRK_G ULT. 
Add PRC_G_COMMANDS, PRC L NXT CHDPTR.. and pRC V 
Add DCL“L cENTITY bcL_L ~tOKEN C_GetTvm, 6cC 
“D BUFLEN,~ btL _W EOEFLENT. and DCL_L_D 
Add PLM_B_ boAbE St C. 


PEP 


CP FREEVA 
EF ADDR. 
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DEFINE PROCESS WORK AREA (BASED AT R11=CTLSAG_CLIDATA) 


TRUCT PRC 
SA 


$ 

F 

F 

F 

F 

F 

F 

F 

F 

F 

F 

F ABEL 
: LOCAL ,Q 
F 

F 

F 

F 

F 

F 

F 

F 

F 

F 

v 

CNT 


EOF LOGO 
SE TACHED 
ONLEVEL ,W 
ONERROR 
PPFLIST 
TMBX,L 
IMGFLAG,B 
<M 
snunnens 


F 8,1 


<a TAT 


SAVED spr dl POINTER 
SAVED FRAME POINTER 


ADDRESS. OF INPUT RAB 

ADDRESS OF OUTPUT RAB 

ADDRESS OF XABTRM ITEM LIST 
ADDRESS OF INDIRECT INPUT RAB 
ADDRESS OF INDIRECT OUTPUT RAB 
ADDRESS OF INDIRECT FAB 

SYMBOL ALLOCATION REGION LISTHEAD 
GLOBAL SYMBOL TABLE LISTHEAD 
LABEL SYMBOL TABLE LISTHEAD 

LOCAL SYMBOL TABLE LISTHEAD 
KEYPAD SYMBOL TABLE L:STHEAD 
ADDRESS OF CURRENT KEY STATE 
ADDRESS OF LOCKED KEY STATE 
ADDRESS OF ERROR SEVERITY are eg VALUE 
ADDRESS OF COMPLETION STATUS VALU 
ADDRESS OF RE T_VALUE 


STAR 
INDIRECT STACK DEPTH (# LeveL S| —? 
ADDRESS OF aby on tat TABLE ENT 
: “4 CHANNEL FOR INTERACTIVE JoBs 


WAIT COMMAND 1088 
PROCESS LEVEL FLAGS 


CARRIAGE CONTROL IN PROMPT STRING FLAG 
SUPERVISOR coin Y/C LEVEL REQUEST 
DISABLE CON Y AST'S 

EXIT HANDLER” ESTABLISHED 

FORWARD GOTO IN ecte ESS 

PROCESSING INDIRECT FIL 

OMMAND PROCESSING MODE (BATCH=1, INTER=0) 


D E 
VERIFY LINES OF FILES 
SILENT anit (SDELPRC) ON NEXT LEVEL 0 SGET 
IER N COMMAND 


yt TEXT 


x 
OPEN COMMAND) 
ILBOX CREATED 


aan 
So 
cag! 
wv 
vo 
—n—4 


A 
L 
L 
B 
I 


IMAGE RUNDOWN FLAG 
SPARE 
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ORR hhh 


=<" 


aah 


ARRAN AAA 


LSTSTATUS 
rene 


20 
CTRLT 
CTRLY 
> 


ONCTLY 
IDF LNK 
SPWN 


ASTSTATUS ,W 
AS 


SAVEPRIV,Q 


CHANNEL TO MAILBOX FOR RE-ATTACH REQUESTS 
TOTAL INDIRECT STACKS & UNSTACKS 
IMAG ACTIVATOR STATUS 
RMS COMPLETION CODE (STS AND STV ASSUMED 
RMS STATUS VALUE ALWAYS ADJACENT) 
EXIT HANDLER CONTROL BLOCK 
EXIT HANDLER ADDRESS 
ER OF EXIT HANDLER ARGUMENTS 

ADDRESS OF REASON FOR EXIT (BELOW) 
REASON FOR EXIT 
INDIRECT STACK POINTER 
INDIRECT STACK LIMIT 
‘DOT’’ FOR EXAMINE/DEPOSIT 
WIDTH DEFAULT, IE: BYTE,WORD,LONGWORD 

DE DEFAULT, IE: ASCII,HEX,OCTAL 
CURRENT DEFAULT RADIX 
PROCESS RADIX TYPES 
HEXIDECIMAL 
DECIMAL 
OCTAL 


PROCESS LEVEL FLAGS (MORE OF THEM) 


COMMAND CALLBACK HAS BEEN DONE 

CHAIN CALLBACK _HAS BEEN DONE 

USE RUN DEFAULT (NOT EXTERNAL) 

IMAGE IS EXECUTE ONLY 

IMAGE IS PRIVILEGED 

EXE-ONLY COMMAND PROCEDURE (OBSOLETE) 
FLUSH THE CURRENT 

HAVE RMS DO IMAGE VERIFICATION 


: + STATUS SET (LONGWORD VALUE) 


T OF BAND AST ENABLE BITMASK 
SKIP UNUSED CHARACTERS 


CONTROL T 
SKIP UNUSED CHARACTERS 
CONTROL Y 
ADDRESS OF ON CONTROL/Y Comat TEXT 

INTER TO INDIRECT FILE FRA 
LISTHEAD OF SPAWN STORAGE BLOCKS F ACH 
UBPROCESS CREATED; SPAWN STORAGE FOR PROCESS 
CURRENTLY BEING SPAWNED IS FIRS . 
AVED CNTL-Y AST STATUS (TEMP 


$s (TEMPORARY) 
SAVED CNTL-Y AST REENABTE IOSB (TEMPORARY) 


X_ CHANNEL 
SIZE OF MAXIMUM OUTPUT MAILBOX MESSAGE 
aie REFERENCE COUNT 
OG FLUSH RATE 


L 

T 

TOR OF CHAIN COMMAND LINE 
RIVILEGED IMAGE PRIVILEGES 
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F pronetbene B : 
F ed Ae ; 
F CONTI E8 : 
F PROMPT. G 32 ; 


<a 
Cc 
— 
J 
< 
es 


prenee 
: EXONLYL .B 


=) 
_ o 
o 
e 
Be Ge Se Ge Ge Ge Se Sse Sete GeGes 


Recall command buffer elements 
frames available to shrink. 


F RECALLPTR 
F COMMAND 1025 ; 
C ERDBUR SIS. {025 : 
L LENGTH ; 
E 
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Prompt string must be kept together (and mimicked in CTX data structure). 


Leet OF PROMPT ah Le 
OMPT CONTROL CHARACTERS 


; PROMPT CONTINUATION CHARACTER 


PROMPT STRING AREA 


; 1 ie OUTRABCTX, OUTDVI, and OUTFLAGS must be the same in PRC, 


IF] FOR OUTPUT 
ISI_FOR OUTPUT 
CONTENTS OF OUTPUT RAB CTX LONGWORD 
INDIRECT OUTPUT DEVICE (ASCIC) 
FLAGS 

; CONCEALED OUTPUT DEVICE 

; CONCEALED 


vic 
INPUT DEVICE 
ICA 


VERIFICATION F 


; SAVED COMMAND LAG 
; SAVED IMAGE VERIFICATION FLAG 

; FIRST E-ONLY INDIRECT LEVEL 

; SPARE 


- using them causes the number of indirect 


: POINTER VO NEXT yer IN BUFFER 


BUFFER OF COMMAND LIN 
LENGTH OF COMMAND BUFFER 


LENGTH OF PROCESS WORK AREA 


M14 
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; DEFINE PROCESS RMS DATA AREA 

STRUCT PRD 

£ é +680 : PROCESS FAB 

F NAM.G ; PROCESS NAME BLOCK 

F INPRAB,G,6 : INPUT RAB 

F ALTINPRAB, : 68 : ALTERNATE INP 

F AL TOUT RAB $ ALTERNATE ANTPUT RAB 

F 6.68" ; OuTBUT RAB 

F da x : TERMINAL 

F TRALIST 6.4 : ITEMLIST ‘OR TERMINAL XAB 

L : NORMAL LENGTH 
3 FOLLOWING EXTENSION USED ON LEVEL 0 TO STORE FID/DID/FNM FOR QUEUING 
: THE JOB LOG FILE TO THE JOB CONTROLLER. 

F OUTDVI,T,16 : DEVICE FOR OUTPUT FILE 

F QUTF 1D.u.3 : FILE ID FOR OUTPUT FILE 

F OUTDID.W. : DIRECTORY ID FOR OUTPUT FILE 

F OUTFNM.T.20 : OUTPUT FILE NAM 

: XLENGTH : LENGTH OF EXTENDED BLOCK 
: OFFSETS OF ITEM IS TERMINAL XAB ITEM LIST. 

STRUCT ITRM 

F MODLEN,W ; TRMS_MODIFIERS ENTRY 

F MODCODE ,w , 

F IF IERS 

F MODRET 

F PMPTLEN,W ; TRMS_PROMPT ENTRY 

F PMPTCODE ,W 

F PMPTADDR 

F PMPTRET 

L MINLEN ; MINIMUM ITRM REQUIRED 

F INILEN,W > TRMS_INISTRING ENTRY 

F INICODE ,W 

F INIADDR 

F INIRET 

F OF FLEN,W ; TRMS_INIOFFSET ENTRY 

F OF FCODE ,wW 

F F 

F 

L 

E 


eee. .0...00—b0b a, 
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Define command work area (based at R10) 


STRUCT WRK 


Work area constant and length definitions 


C 


> 
~F 8,0 
L LENGTH 


Command buffers and pointers 


of EXPANDPTR 
-F MARKPTR 

-F CHARPTR 

-F BUFFER,G,1024 
-F B,4 

-F iNPBUF ,G,256 


=f ee 


; EXPANDED COMMAN 
; INPUT BUFFER SI 


D 

Z 
OMMAND 
E 8 

F 

RO 


SeGe Ge Ge Geees 
o 
Cc 
<xn—— 
—cC om 
2 cwz- 
“+2 
> 
=z 
m 
nn 
on 
> 
a 


rors agence OF NEGATED $ 
(NEEDED TO OBTAIN LENGTH DE 


EXPANSION orcs CHARACTER POINTER 

POINTER INTO EXPANSION BUFFER OF THE CURRENT 
SEGMENT BEING PARSED 

INPUT BUFFER yooh POINTER 

COMMAND EXPAN FFER 

4 BYTES BEFORE INPUT rap oe FOR SLOPUNDER 
COMMAND INPUT BUFFER FOLLOWS EXPANSION BUFFER 
8 BYTES BEFORE AFTER BUFFER FOR SLOPOVER 


Input reading and processing routines and data 


_ PMPTLEN,W 
-F PMPTADDR 
-F PROMPTRIN 
of READRTN 
-F ERRORRTN 
-F SPECRTN 


LeNere OF CURRENT PROMPT STRING 
ADDRESS OF CURRENT PROMPT STRING 
ADDRESS OF PROMPT ROUTINE 

ADDRESS OF rab yg he it. eout ie 


ADDRESS OF CHARACTER INPUT ERROR ROUTINE 
ADDRESS OF SPECIAL CHARACTER PROCESSING RIN 


; Restul parse descriptors and pointers 


-F RESULT,G,1536 
-F RSLEND,L 
-F RSLNXT, t 


: Command definition information 


-F VERB 


3 RESULT PARSE DESCRIPTOR AREA (96 MAX) 
; ADDRESS OF LAST TOKEN DESCRIPTOR 
; ADDRESS OF NEXT FREE TOKEN DESCRIPTOR 


: ADDRESS OF ASCIC VERB NAME 


-F VERBTYP,B 
-F CM MDOPT 6 
-f VALLE 

+ pe 8 
=f QUABLK 

of PARMENT .B 
-F PARMSUM.B 
-F MAXPARM.B 
-F MINPARM.B 
-F PAROUT 

-F SIGNALRTN 
=f L 

-F TAB_VEC 
-F IMAGE 

-F DISALLOW 
of RECALLPTR 
-F IMGCHAN, W 


V <M 


USRMODE 
ESCAPE 


of FLAGS2,W 
<M 


CLOSERR 
> 


; Saved context registers 
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COMMAND VERB TYPE (SEE SCLIVERBDEF) 
QUALIFIER # CAUSING THE FIRST SYNTAX CHANGE 
DEPTH OF CURRENT VALUE ON THE COMMAND LINE 
NUMBER OF RECALL COMMANDS ISSUES 
ADDRESS OF PARAMETER ENTITY BLOCK LIST 
ADDRESS OF QUALIFIER ENTITY BLOCK LIST 
CURRENT PARAMETER COUNT 
NUMBER OF PARAMETER VALUES 

XIMUM NUMBER OF PARAMETERS ALLOWED 
MINIMUM NUMBER OF PARAMETERS REQUIRED 
ADDRESS OF LISTS OF OUTPUTS 
ADDRESS OF ERROR SIGNALING ROUTINE 
ADDRESS OF COMMAND TABLE QVECTOR 
ADDRESS OF IMAGE NAME STRING; OR TABLE INDEX 
: ADDRESS OF DISALLOW EXPRESSION T 
POINTER INTO THE RECALL BUFFER 
IMAGE ACTIVATION CHANNEL OL OMBER 


: Flags describing the command Line 


COMMAND LEVEL FLAGS 


RUNDOWN HAS BEEN DONE 

COMMAND (IMAGE) EXECUTION IN PROGRESS 

bse. AVOID ay abe. ERROR SEGMENT TEXT) 
PROMPTING IN PROGRESS 

CONTINUATION IN PROGRESS 


PROCESSING QUOTED STRING 
ASTERISK IS TE 
te Fe NG VER 

NQUIRE UIRED 


C READ REQU 
DON'T STORE SUCCESS AL i ON COMPLETION 
TRAILING SPACES IN CONTINUED LIN 

CURRENTLY SUBSTITUTING INPUT RECORD SYMBOLS 
DON'T UPCASE E 


(SO sh hy ANY ERRORS Beatae SUBSTITUTION) 
USER MODE PARSE IS BEING PERFORMED 
ESCAPE SEQUENCE IS BEING PROCESSED 


MORE COMMAND LEVEL FLAGS 
COMMAND INVOKES A INTERNAL CLI ROUTIN 


NE 
COMMAND INVOKES A _USER@SPECIFIED ROUTINE 
SUPPRESS *CLOSE* ERROR MESSAGE. 


ACK 


POINTER 
IAL FRAME POINTER 
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DEFINE RESULT PARSE POINTERS. EACH POINTE 
A TOKEN ON THE COMMAND LINE FROM LEFT TO R 


TRUCT PTR 
DESCR, 
YALE. B 


VALUE ,8 
OFFSET, 12 
FLAGS 4 
TERM, 4 
TY 


<u" 


LEVEL.B 
NUMBER ,B 
PARMCNT.B 


ENTITY 
LENGTH 


arn aa 


; EN 
3; FI 
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R DESCRIBES 
IGHT. 


NGWORD 
S TOKEN LENGTH 


G 
I 
GTH 

ze! IN BUFFER 
RMINATOR CLASS NUMBER 


0 
E 
N 
F 
A 


FLAG BIT DEFINITIONS 


QUALIFIER WAS NEGATED 
VALUE IS A KEYWORD 
CAUSED TRANSITION TO NEW COMMAND SYNTAX 


; DEFINE TERMINATOR CLASSES, STARTING AT 1 
BLANK 


COLON 


SLASH 
; PLUS SIGN 
OMMA 


RIGHT PARENTHESIS 
LEFT PARENTHESIS 


DEFINE TYPE NUMBERS, STARTING AT 0 
COMMAND QUALIFIE 

PARAMETER QUALIFIER 

QUALIFIER VALUE 

PARAMETER 

END OF LINE 

INVALIDATED DESCRIPTOR 

VALUE LEVEL 


KEYWORD NUMBER 
PARAMETR COUNT 
SPARE 


TITY BLOCK ADDRESS 
XED LENGTH OF DESCRIPTOR 


— 
N ” 
—_— — 
— 
7) — 
oa =z 
a ws 
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[* 4 
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x= Bu Vwnrv Ow w 
vw = www - oO 
iVYuw wow atu a 
wae oa a 20 
wos - “_ - 
—< -e- Zw wo 
= ] <anwn acm 
ts ed weet wie os 
wo Zen Fw uw 
~wawo 
a z cerere ere oe 
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Zz 
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~ 
ae 
us 
(=) 
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DEFINE STORAGE USED BY OLD CLI INTERFACE. 
THE MEMORY FOR THIS AREA IS SUPPLIED BY THE CALLING PROGRAM. 


STRUCT RPW : RESULT PARSE WORK AREA 

F USERCTX : USER CONTEXT LONGWORD 

F DCLWRK : ADDRESS OF COMMAND WORK AREA 

F STRPARM,B : INDEX TO FIRST PARAMETER DESCRIPT 

F LSTDESC.B : INDEX TO LAST PARAMETER DESCRIPTO 

F .B, : SPARE 

F L 3 Seare 

F B1TS,6,32 : 256 BITS, 1 IF opi PROCESSED BY RESULT PARSE 
L HDRSI2Z : SIZE OF FIXED 

F PRMLIM,G,64 : UP TO 16 AREAMETER CtMIT DESCRIPTORS (PLM) 
E LENGTH 3; LENGTH OF MAXIMUM SIZE 
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DCLDEF .MDL;1 
: DEFINE STORAGE USED BY NEW CLI INTERFACE 
STRUCT ODCL 
F PRMLIM,L,1 ; Parameter Limit descriptors 
¢ CONTEXT ,? ; Number of levels of context 
F ENTITY,L,7 ; Context entity block addresses 
F TOKEN,L,? : Context token desc addresses 
F AL 3; Address of last er token 
F GETVM ; Address of LIBSGET_VM 
F FREEVM ; Address of LIBSFREE_VM 
: oerLen es 3; Length of default value 
F DEFADDR,L ; Address of default buffer 
4 FLAGS 8 ; Flags byte 
NOWRKAREA 3; True if invalid WRK area pointer 
NEXTQUAL ; True if processing DCLS$NEXTQUAL 
F BUFLEN,W 3; Length of default value buffer 
F PARAM ,B ; Last parameter # requested 
L SIZE 
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; DEFINE SYMBOL TABLE ENTRY 


TRUCT SYM 
MAXSTATES ,64 


$s 

¢ : 
F : 
F BL ; 
F ; 
F : 
Cc 


—VArDUMA+4vO" 


NONUNIQUE ,B ; 


<"v0 "2S 


1 
FLAGS ,B ; 
<M 


ECHO 
TERMINATE 
STATE 


LOCK 
“tae 
F SYMBOL ,T ; 
SYMBOL at DIRECTLY FOLLOWS: 
FOR STRING 


: LONG 
FOR LABELS: WORD OF 6 
on - SIZE 
VALUE” s 
BY 
SYMBOL 


Be Se Ge Se Ge Fe Ge Se Ge Ge Se Ge Ge Se Ge 


E 
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; MAXIMUM NUMBER OF KEYPAD STATES ALLOWED 
; SYMBOL ENTRY FORWARD LINK 


; SIZE OF SYMBOL TABLE ENTRY 
; SYMBOL 


VALUE IS VARIABLE Lonely STRING 
PERMANENT S$ TRING 


YMB 
; VALUE IS BINARY CONGWORD VALUE 
; VALUE IS RFA OF LINE WITH LABEL 
; KEYPAD SYMBOL 


LENGTH OF NAME PORTION WHICH IS NONUNIQ 
(THAT IS, # CHARS AFTER UNIQUENESS POIN 


KEYPAD FLAGS 


ty 4 " SUBSTITUTED COMMAND 

TREAT THE KEY AS A_TERMINATOR 

STATE SHOULD BE SET 

SET THE STATE UNTIL EXPLICITLY RESET 
ERASE THE LINE BEFORE EXECUTING THE KEY 


ASCIC SYMBOL NAME 


: WORD-COUNTED STRING 
ONGWOR 


FOLLOWED BY 6 BYTE RFA 
FOR KEYPAD: wORD= COUNTED STRING OF THE FOLLOWING FORMAT 


OF STRING 
° sthing VALUE STRING 
TE - SIZE OF Fists Sescnieans THE STATE WHEN THIS 
hd DESCRIBING THE STATE WHEN THIS SYMBOL IS DEFINED 


YTE = SIZE OF STRING DESCRIBING THE STATE THIS SYMBOL SETS 
STRING DESCRIBING THE STATE THIS SYMBOL SETS 


OUT 
IDF 


1 
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DEFINE INDIRECT STACK FRAME 


TRUCT IDF 
N 


Ss 
F K 3; POINTER TO A. ws INDIRECT FILE FRAME 
F NPIFI,W 3; IFI FOR INP 
F ONLEVEL ,W 3; ON ERROR LEVEL NUMBER 
F ERROR 3; ADDRESS OF ERROR COMMAND TEXT 
£ INPRABCTX 3; CONTENTS OF INPUT RAB CTX LONGWORD 
F LOCAL ,Q 3 LOCAL SYMBOL TABLE LISTHEAD 
f LABEL ,Q ; LABEL SYMBOL TABLE tT STHEAD 
IF b tae OUTRABCTX, OUTDVI, and OUTFLAGS must be the same in PRC, 
F OUTIFI,W ; IFI FOR OUTPUT 
F OUTISI,W ; ISI FOR OUTPUT 
E OUTRABCTX ; CONTENTS OF OUTPUT RAB CTX LONGWORD 
F OUTDVI,T,16 3: INDIRECT OUTPUT DEVICE (ASCIC) 
4 rae 3; FLAGS 
OUTCCL : CONCEALED OUTPUT DEVICE 
INPCC 3; CONCEALED INPUT DEVICE 
é 8.3 > SPARE 
F INPDVI,T,16 3 tay INPUT our ait (ASCIC) 
F INPFID,W,3 3 FILE ID FOR INP 
F INPDID,W,3 ; DIRECTORY ID ay INP UT FILE 
f INPRFA,W,3 3; RECORD FILE ADDRESS FOR INPUT 
4 FLAG. ; INDIRECT FLAGS 
INPOPN ; THIS INPUT OPEN IS REQUIRED 
REROTE 3; COMMAND PROCEDURE EXISTS ON REMOTE NODE 
CTLY 3; SAVED ADDRESS OF ON CONTROL/Y COMMAND 
F SEARCHCTX 3 LISTHEAD OF FSSEARCH CONTEXT BLOCKS: 
3 4 = LINK POINTER, 0 TO E 
; _2ND LONGWORD = SIZE OF BLOCK IN BYTES 
NAME 3 ADDRESS OF ASCIC COMMAND PROCEDURE NAME 


| eels es De] 
eo 
mo 
2 
— 
= 
s 


; LENGTH OF INDIRECT FRAME 


DCLDEF .MDL;1 


STRUCT SPWN 


<a 


aA TRH OTH THT] TF OT 


LINK,L 
SIZE .W 


Ww 
UNIT, W 
CHAN, W 
FLAGS,W 
cB 

LOG 
PRCNAM 
WA 
AUTOLOGO 
MO 


> 
ACMODE .B 
EFN,B 
MBXNAM, 0 
mse 
OuTPUT a 
CMDSTR.O 
0SB,0 


I 
SUBPID,L 
STATUS.L 


PRIB,L 
ASTADR,L 


ASTPRM,L 
STSADR,L 


OUTOFBAND,L 

IMAGCNT,L 

QUOTAS gt 50, 

PROCESS, 1,1 
Prompt string must be 


PROMPTLEN,B 


Bete Se Se Se Ge Ge Ge Se Ge Ge Ge Ge Gets Ge Ge Ge Se Ge Se Ge 
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; TEMPORARY STORAGE USED FOR SPAWNING SUBPROCESSES 


R TO NEXT IN CHAIN 
F BLOCK 


ON MAILBOX UNIT NUMBER 
ILBOX CHANNEL 


PECIFIED 

FTER CMDSTR EXECUTED 

VE_ MODE OF SUBPROCESS 
SUBPROCESS 

TO SUBPROCESS 

BEING SPAWNED 


-—pPpoMw 


a 
o- 
“n< 
~ 
~-2 


omuam oa co—<m 


—se Ce 


“” 
m 
ie * <a pang be TFT 
m4 nanZe 
wn 


o> — Ue 4 
——~Ommmnr 


I 

SSOUTPUT 

: SUBPROCESS 
TO SUBPROCESS 
/TABLE=value SPE IED 


acess MODE TO CALL ASTADR AST ROUTINE 
TO PROBE STSADR LONGW 
EVENT _ ie SET WHEN SUBPROCESS COMPLETES 


E 
DESCRIPTOR OF bh nes cee NAME 
IPTOR OF PROCESS N 
IPTOR OF SUBPROCESS INPUT FILESPEC 
IPTOR OF SUBPROCESS uv i ILESPEC 
F faac 2, oe EXECUTED 


wv 
> 
“a 
“ 
~ 
za 
$ 
> 
wn 
“ 
8 
a4m—4<—7 


ail henh— +p —b—4 vy 4 
ee STENT 
nunnn 4+ 


S$ 
SUBPROCESS 


—- ~Oums gay mn 
 woom2a 
apas 
aes 


zm 
— 
z< 
om 
m 
— 


R 
PROCESS T 
SPACE FOR SUBPROCES 
ASCIC SUBPROCESS NAME 


kept together (and mimicked in PRC and CTX) 


LENGTH OF PROMPT STRING 


oo 
o- 
wy 
oa 
oe 
a 
woo 
Se 
° 
wo 
= 
~ 

| a) 
~o 
- 
wT 
co 
oa 
- 

a 
a 
ud 
”) 

‘ 
ve] 
- 


E 
A 
TABLE NAME 


A 
NAME 
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FORMAT OF THE CONTEXT MESSAGES 
S INIT 


H_ARE TRANSMITTED FROM THE SPAWN 
COMMAND TO THE SUBPROCES N 


WHIC 
IALIZATION. 


STRUCT CTX 
C MAXLEN, 1024 3 MAXIMUM PECORD SIZE 
f yWrE ; MESSAGE TYPE 
HEADER 3; HEADER a 3 yi 
CMDSTR ; COMMAND STRING 
LOGNAM 3; LOGICAL NAMES 
CLISYM ; CLI_ SYMBOLS 
KEYSTATE 3 KEYPAD TATE 
LNMTABLE 3; LOGICAL NAME TABLE 
; LOGICAL NAME BLOCK CINITIAL RECORD) 
Staion ; ADDITIONAL TRANSLATIONS (NYI) 
M 1 
; FOR HEADER RECORDS 
F PROCPRIV,Q 3; PROCESS PRIVILEGES 
4 tated ; OUT-OF-BAND AST CHARACTER MASK 
220 3 SKIP UNUSED CHARACTERS 
CTRLT ; CONTR ; 
P 3 SKIP UNUSED CHARACTERS 
Say ; CONTROL Y 
4 LA 8 ; FLAGS BYTE 
AUTOLOGO 3 SILENT ag AFTER COMMAND 7” ING EXECUTED 
3; (1 RT TO SYSSINPUT AFTER EXECUTION) 
MODE ; BATCH/ INTERACTIVE MODE BIT 
VERIFY 3; VERIFICATION FLAG 
VERIMAGE : IMAGE VERIFICATION FLAG 
WAIT 3; WAIT/NOWAIT SUBPROCESS BIT 
; Prompt string must be kept together (and mimicked in PRC and SPWN) 
F PROMPTLEN,B ; LENGTH OF PROMPT byt i 
F PMPTCTRL,W 3; PROMPT CONTROL CHARACTERS 
F CONTINUE, : PROMPT CONTINUATION CHARACTER 
F PROMPT ,G, 52 3; PROMPT STRING AREA 
L HDRLEN ; FIXED SIZE OF HEADER RECORD 


; FOR COMMAND STRING RECORDS 


1 
CMDSTR,T 3 ASCII COMMAND STRING (NO COUNT) 


DCLDEF .MDL;1 


1 
ENTSIZE,W ; 
ACMODE ,B ; 


LOGNAM,T : 


FOR CLI SYMBOL RECORDS 
1 
W 
SYMTAB.B 
GLOBAL 
LOCAL 
KEYTABL 
SYMTYPE.B ; 
STRING ; 
PERM ; 
BINARY : 
LABEL ; 
KEYPAD ; 
F NONUNI QUE ,B : 
F SYMBOL ,T ; 


OnnyD « 


aon 


FOR KEYPAD STATE RECORD 


1 
KEYLENGTH,B 
KEYSTATE,T 


-~an" DO ee 


aaah D « 


2 
NFLAGS,B 
TRANCNT ,B 
LNMNAM 


~~ O ©: 


LABELS AR 
; VALUE 1s A KEYPAD SYMBOL 


M 
16-SEP-1984 16:37:40.98 Page 20 


; FOR LOGICAL NAME RECORDS 


SIZE OF ENTRY 

ACCESS MODE OF LOGICAL NAME 

ASCIC LOGICAL NAME 

WORD-COUNTED VALUE STRING FOLLOWS 


: SIZE OF ENTRY 
; SYMBOL TABLE TYPE 


SYMBOL TYPE 


; VALUE IS VARIABLE LENGTH STRING 
PERMANENT SYMBO TRING 


Ll, N 
apd Is BINARY CONGWORD VALUE 
D NOT PASSED 


LENGTH OF NON-UNIQUE PORTION OF NAME 
ae # CHARS a UNIQUENESS POINT) 


SYMBOL NAM 
; ae stated DIRECTLY FOLLOWS: 


TRING: WORD-COUNTED STRING 
FOR BINARY: LONGWORD 


; STATE LENGTH 
3 ASCII STATE NAME 


FOR LOGICAL NAME TABLE RECORDS (LNMTABLE) 


2 

TELAGS, B > TABLE FLAGS 

PROT : PROTECTION MASK 

QUOTATL : TABLE QUOTA 

UNMTABLE , T : ASCIC LOGICAL NAME FOR TABLE 


ASCIC PARENT TABLE NAME FOLLOWS 


FOR LOGICAL NAME RECORDS (LNMNAME & LNMNTRAN) 


; NAME FLAGS OF LOSICAL NAME 
NUMBER OF TRANSLATIONS 
: ASCIC PARENT TABLE NAME 


N 1 
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FOLLOW 


oo 
*e 
ra) 
= 
. 
ta 
uw 
ray 
_ 
— 
(=) 
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|} TERMINATION MAILBOX LIST ITEM 


STRUCT TMBX 

C MAXREF® ,4 : MAXIMUM NUMBER OF SUBPROCESSES USING A 
: SINGLE TERMINATION MAILBOX 

F LINK,L : POINTER TO NEXT ITEM 

F UNIT .W + MAILBOX UNIT N 

F CHANNEL ,W : MAILBOX CHANNEL NUMBER 

F REFS,B : wis OF OF SUBPROCESSES CURRENTLY USING 

F ; 

F size. W ; SITE OF BLOCK 

F PRC,L : ADDRESS OF PROCESS WORK AREA 

: LENGTH : SIZE OF STRUCTURE 


——————— ee - ee 
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; OUTPUT FILE INFORMATION 


OUTIFI, OUTISI, OUTRABCTX, 
IDF, OUT 


pat OuT 


<a77n 
ACO oO 
z2cc 

—_ 

J 

< 


8,3 
LENGTH 


mem 
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16-SEP-1984 16:37:40.28 Page 23 


OUTDVI, and OUTFLAGS must be the same in PRC, 


OUTPUT 

OUTPUT 

S OF OUTPUT RAB CTX LO — 
T OUTPUT DEVIC E (ASCIC) 


LED OUT * DEV 
LED INPUT DEVI 


Ss 
SIZE OF STRUCTURE 
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; EDIT FLAGS 


STRUCT EDIT 
F FLAGS .B ; FLAGS BYTE 
<M 
UNCOMMENT 
PRESS 
COLLAPSE 
IM 


UPCASE 
LOWERCASE 
EOL 


> 


AH-BT13A-SE | IP 


DI ENT CORPORATION 
VAX/VMS V4.0 CO 


ND PROPRIETARY 


M 
A 
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